/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_11 / renum / test

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0b f4 20 3e 54 | 65 73 74 0d 00 14 1e f4 |..... >T|est.....|
|00000010| 20 56 61 6c 69 64 61 74 | 69 6e 67 20 49 6e 70 75 | Validat|ing Inpu|
|00000020| 74 20 52 6f 75 74 69 6e | 65 0d 00 1e 14 f4 20 62 |t Routin|e..... b|
|00000030| 79 20 43 6c 69 76 65 20 | 50 61 79 6e 65 0d 00 28 |y Clive |Payne..(|
|00000040| 05 f4 0d 00 32 08 eb 20 | 31 32 0d 00 3c 0d f2 49 |....2.. |12..<..I|
|00000050| 4e 49 54 5f 53 59 53 0d | 00 46 05 20 0d 00 50 24 |NIT_SYS.|.F. ..P$|
|00000060| f1 8a 32 30 29 3b 22 56 | 61 6c 69 64 61 74 69 6e |..20);"V|alidatin|
|00000070| 67 20 49 6e 70 75 74 20 | 52 6f 75 74 69 6e 65 22 |g Input |Routine"|
|00000080| 0d 00 5a 29 f1 8a 35 2c | 38 29 3b 22 45 6e 74 65 |..Z)..5,|8);"Ente|
|00000090| 72 20 61 6e 20 61 6c 70 | 68 61 6e 75 6d 65 72 69 |r an alp|hanumeri|
|000000a0| 63 20 73 74 72 69 6e 67 | 22 0d 00 64 23 f2 49 4e |c string|"..d#.IN|
|000000b0| 28 34 30 2c 38 2c 38 2c | 30 29 3a e7 20 46 4c 41 |(40,8,8,|0):. FLA|
|000000c0| 47 28 30 29 3d 31 20 eb | 31 32 3a e0 0d 00 6e 05 |G(0)=1 .|12:...n.|
|000000d0| 20 0d 00 78 2e f1 8a 35 | 2c 31 30 29 3b 22 45 6e | ..x...5|,10);"En|
|000000e0| 74 65 72 20 61 20 70 75 | 72 65 6c 79 20 61 6c 70 |ter a pu|rely alp|
|000000f0| 68 61 62 65 74 69 63 20 | 73 74 72 69 6e 67 22 0d |habetic |string".|
|00000100| 00 82 23 f2 49 4e 28 34 | 30 2c 31 30 2c 38 2c 31 |..#.IN(4|0,10,8,1|
|00000110| 29 3a e7 46 4c 41 47 28 | 30 29 3d 31 20 8c 8d 44 |):.FLAG(|0)=1 ..D|
|00000120| 64 40 0d 00 8c 05 20 0d | 00 96 24 f1 8a 35 2c 31 |d@.... .|..$..5,1|
|00000130| 32 29 3b 22 45 6e 74 65 | 72 20 61 20 6e 75 6d 65 |2);"Ente|r a nume|
|00000140| 72 69 63 20 73 74 72 69 | 6e 67 22 0d 00 a0 23 f2 |ric stri|ng"...#.|
|00000150| 49 4e 28 34 30 2c 31 32 | 2c 38 2c 32 29 3a e7 46 |IN(40,12|,8,2):.F|
|00000160| 4c 41 47 28 30 29 3d 31 | 20 8c 8d 74 42 40 0d 00 |LAG(0)=1| ..tB@..|
|00000170| aa 05 20 0d 00 b4 29 f1 | 8a 35 2c 31 34 29 3b 22 |.. ...).|.5,14);"|
|00000180| 45 6e 74 65 72 20 61 20 | 50 61 73 73 77 6f 72 64 |Enter a |Password|
|00000190| 20 28 41 6e 79 74 68 69 | 6e 67 29 22 0d 00 be 24 | (Anythi|ng)"...$|
|000001a0| f2 49 4e 28 34 30 2c 31 | 34 2c 38 2c 36 34 29 3a |.IN(40,1|4,8,64):|
|000001b0| e7 46 4c 41 47 28 30 29 | 3d 31 20 8c 8d 74 60 40 |.FLAG(0)|=1 ..t`@|
|000001c0| 0d 00 c8 05 20 0d 00 d2 | 26 f1 8a 35 2c 31 36 29 |.... ...|&..5,16)|
|000001d0| 3b 22 45 6e 74 65 72 20 | 61 20 76 61 6c 69 64 61 |;"Enter |a valida|
|000001e0| 74 65 64 20 6e 75 6d 62 | 65 72 22 0d 00 dc 24 f2 |ted numb|er"...$.|
|000001f0| 49 4e 28 34 30 2c 31 36 | 2c 38 2c 31 38 29 3a e7 |IN(40,16|,8,18):.|
|00000200| 46 4c 41 47 28 30 29 3d | 31 20 8c 8d 74 7e 40 0d |FLAG(0)=|1 ..t~@.|
|00000210| 00 e6 05 20 0d 00 f0 3d | f1 27 27 27 8a 32 30 29 |... ...=|.'''.20)|
|00000220| 3b 22 4e 6f 77 20 69 74 | 27 73 20 79 6f 75 72 20 |;"Now it|'s your |
|00000230| 74 75 72 6e 20 74 6f 20 | 65 78 70 65 72 69 6d 65 |turn to |experime|
|00000240| 6e 74 20 2d 20 48 61 76 | 65 20 46 75 6e 21 21 21 |nt - Hav|e Fun!!!|
|00000250| 22 0d 00 fa 06 20 e0 0d | ea 60 22 dd f2 49 4e 28 |".... ..|.`"..IN(|
|00000260| 48 4f 52 49 5a 25 2c 56 | 45 52 54 25 2c 4c 47 54 |HORIZ%,V|ERT%,LGT|
|00000270| 48 25 2c 54 59 50 45 25 | 29 0d ea 6a 14 20 20 f2 |H%,TYPE%|)..j.  .|
|00000280| 4c 49 4d 49 54 53 28 54 | 59 50 45 25 29 0d ea 74 |LIMITS(T|YPE%)..t|
|00000290| 07 20 20 f5 0d ea 7e 22 | 20 20 20 20 f2 53 50 41 |.  ...~"|    .SPA|
|000002a0| 43 45 28 48 4f 52 49 5a | 25 2c 56 45 52 54 25 2c |CE(HORIZ|%,VERT%,|
|000002b0| 4c 47 54 48 25 29 0d ea | 88 2e 20 20 20 20 46 4c |LGTH%)..|..    FL|
|000002c0| 41 47 28 30 29 20 3d 20 | 30 3a 41 4e 24 20 3d 20 |AG(0) = |0:AN$ = |
|000002d0| 20 22 22 3a 53 49 5a 45 | 25 20 3d 20 30 3a 41 4e | "":SIZE|% = 0:AN|
|000002e0| 20 3d 20 30 0d ea 92 09 | 20 20 20 20 f5 0d ea 9c | = 0....|    ....|
|000002f0| 0b 20 20 20 20 20 20 f5 | 0d ea a6 14 20 20 20 20 |.      .|....    |
|00000300| 20 20 20 20 43 48 41 52 | 20 3d 20 a5 0d ea b0 1c |    CHAR| = .....|
|00000310| 20 20 20 20 20 20 20 20 | e7 20 20 43 48 41 52 20 |        |.  CHAR |
|00000320| 3c 3e 20 26 30 44 20 8c | 0d ea ba 18 20 20 20 20 |<> &0D .|....    |
|00000330| 20 20 20 20 20 20 f2 44 | 45 4c 5f 43 48 45 43 4b |      .D|EL_CHECK|
|00000340| 0d ea c4 19 20 20 20 20 | 20 20 20 20 20 20 f2 53 |....    |      .S|
|00000350| 49 5a 45 5f 43 48 45 43 | 4b 0d ea ce 0d 20 20 20 |IZE_CHEC|K....   |
|00000360| 20 20 20 20 20 cd 0d ea | d8 21 20 20 20 20 20 20 |     ...|.!      |
|00000370| fd 20 a4 56 41 4c 49 44 | 5f 43 48 41 52 28 43 48 |. .VALID|_CHAR(CH|
|00000380| 41 52 29 20 3d 20 b9 0d | ea e2 19 20 20 20 20 20 |AR) = ..|...     |
|00000390| 20 e7 20 43 48 41 52 20 | 3c 3e 20 26 30 44 20 8c | . CHAR |<> &0D .|
|000003a0| 0d ea ec 16 20 20 20 20 | 20 20 20 20 53 49 5a 45 |....    |    SIZE|
|000003b0| 25 20 2b 3d 20 31 0d ea | f6 1a 20 20 20 20 20 20 |% += 1..|..      |
|000003c0| 20 20 41 4e 24 20 2b 3d | 20 bd 28 43 48 41 52 29 |  AN$ +=| .(CHAR)|
|000003d0| 0d eb 00 16 20 20 20 20 | 20 20 20 20 f2 53 48 4f |....    |    .SHO|
|000003e0| 57 5f 43 48 41 52 0d eb | 0a 0b 20 20 20 20 20 20 |W_CHAR..|..      |
|000003f0| cd 0d eb 14 14 20 20 20 | 20 fd 20 43 48 41 52 20 |.....   | . CHAR |
|00000400| 3d 20 26 30 44 0d eb 1e | 21 20 20 20 20 e7 20 41 |= &0D...|!    . A|
|00000410| 4e 24 20 3d 20 22 5a 22 | 20 84 20 41 4e 24 20 3d |N$ = "Z"| . AN$ =|
|00000420| 20 22 7a 22 20 8c 0d eb | 28 15 20 20 20 20 20 20 | "z" ...|(.      |
|00000430| 46 4c 41 47 28 30 29 20 | 3d 20 31 0d eb 32 15 20 |FLAG(0) |= 1..2. |
|00000440| 20 20 20 20 20 46 4c 41 | 47 28 33 29 20 3d 20 30 |     FLA|G(3) = 0|
|00000450| 0d eb 3c 15 20 20 20 20 | 20 20 46 4c 41 47 28 34 |..<.    |  FLAG(4|
|00000460| 29 20 3d 20 30 0d eb 46 | 2a 20 20 20 20 20 20 f2 |) = 0..F|*      .|
|00000470| 42 4c 41 4e 4b 5f 49 4e | 50 55 54 28 48 4f 52 49 |BLANK_IN|PUT(HORI|
|00000480| 5a 25 2c 56 45 52 54 25 | 2c 4c 47 54 48 25 29 0d |Z%,VERT%|,LGTH%).|
|00000490| eb 50 09 20 20 20 20 cd | 0d eb 5a 1f 20 20 20 20 |.P.    .|..Z.    |
|000004a0| e7 20 54 59 50 45 25 20 | 3d 20 32 20 41 4e 20 3d |. TYPE% |= 2 AN =|
|000004b0| 20 bb 28 41 4e 24 29 0d | eb 64 14 20 20 20 20 e7 | .(AN$).|.d.    .|
|000004c0| 20 41 4e 24 20 3d 20 22 | 22 20 8c 0d eb 6e 16 20 | AN$ = "|" ...n. |
|000004d0| 20 20 20 20 20 f2 42 4c | 41 4e 4b 5f 43 48 45 43 |     .BL|ANK_CHEC|
|000004e0| 4b 0d eb 78 09 20 20 20 | 20 cc 0d eb 82 15 20 20 |K..x.   | .....  |
|000004f0| 20 20 20 20 46 4c 41 47 | 28 31 29 20 3d 20 30 0d |    FLAG|(1) = 0.|
|00000500| eb 8c 09 20 20 20 20 cd | 0d eb 96 33 20 20 20 20 |...    .|...3    |
|00000510| e7 20 28 46 4c 41 47 28 | 33 29 20 3d 20 31 20 80 |. (FLAG(|3) = 1 .|
|00000520| 20 46 4c 41 47 28 30 29 | 20 3d 20 30 29 20 f2 44 | FLAG(0)| = 0) .D|
|00000530| 45 43 49 4d 41 4c 28 41 | 4e 24 29 0d eb a0 39 20 |ECIMAL(A|N$)...9 |
|00000540| 20 20 20 e7 20 28 46 4c | 41 47 28 34 29 20 3d 20 |   . (FL|AG(4) = |
|00000550| 31 20 80 20 46 4c 41 47 | 28 30 29 20 3d 20 30 29 |1 . FLAG|(0) = 0)|
|00000560| 20 f2 4e 55 4d 45 52 49 | 43 5f 43 48 45 43 4b 28 | .NUMERI|C_CHECK(|
|00000570| 41 4e 24 29 0d eb aa 31 | 20 20 fd 20 28 46 4c 41 |AN$)...1|  . (FLA|
|00000580| 47 28 31 29 20 3d 20 30 | 20 80 20 46 4c 41 47 28 |G(1) = 0| . FLAG(|
|00000590| 33 29 20 3d 20 30 20 80 | 20 46 4c 41 47 28 34 29 |3) = 0 .| FLAG(4)|
|000005a0| 20 3d 20 30 29 0d eb b4 | 05 e1 0d eb be 05 20 0d | = 0)...|...... .|
|000005b0| eb f0 14 dd f2 4c 49 4d | 49 54 53 28 45 4e 54 52 |.....LIM|ITS(ENTR|
|000005c0| 59 25 29 0d eb fa 13 20 | 20 ea 20 4c 4f 4f 50 25 |Y%).... | . LOOP%|
|000005d0| 2c 57 4f 52 4b 25 0d ec | 04 14 20 20 e9 20 46 4c |,WORK%..|..  . FL|
|000005e0| 41 47 28 29 20 3d 20 28 | 30 29 0d ec 0e 18 20 20 |AG() = (|0)....  |
|000005f0| 57 4f 52 4b 25 20 3d 20 | 45 4e 54 52 59 25 20 81 |WORK% = |ENTRY% .|
|00000600| 20 34 0d ec 18 18 20 20 | 54 59 50 45 25 20 3d 20 | 4....  |TYPE% = |
|00000610| 45 4e 54 52 59 25 20 83 | 20 34 0d ec 22 16 20 20 |ENTRY% .| 4..".  |
|00000620| e3 20 4c 4f 4f 50 25 20 | 3d 20 31 20 b8 20 31 30 |. LOOP% |= 1 . 10|
|00000630| 0d ec 2c 19 20 20 20 20 | e7 20 57 4f 52 4b 25 20 |..,.    |. WORK% |
|00000640| 83 20 32 20 3d 20 31 20 | 8c 0d ec 36 19 20 20 20 |. 2 = 1 |...6.   |
|00000650| 20 20 20 46 4c 41 47 28 | 4c 4f 4f 50 25 29 20 3d |   FLAG(|LOOP%) =|
|00000660| 20 31 0d ec 40 09 20 20 | 20 20 cc 0d ec 4a 19 20 | 1..@.  |  ...J. |
|00000670| 20 20 20 20 20 46 4c 41 | 47 28 4c 4f 4f 50 25 29 |     FLA|G(LOOP%)|
|00000680| 20 3d 20 30 0d ec 54 09 | 20 20 20 20 cd 0d ec 5e | = 0..T.|    ...^|
|00000690| 1a 20 20 20 20 57 4f 52 | 4b 25 20 20 3d 20 57 4f |.    WOR|K%  = WO|
|000006a0| 52 4b 25 20 81 20 32 0d | ec 68 0d 20 20 ed 20 4c |RK% . 2.|.h.  . L|
|000006b0| 4f 4f 50 25 0d ec 72 05 | e1 0d ec 7c 05 20 0d ec |OOP%..r.|...|. ..|
|000006c0| b8 1f dd f2 53 50 41 43 | 45 28 48 4f 52 49 5a 25 |....SPAC|E(HORIZ%|
|000006d0| 2c 56 45 52 54 25 2c 4c | 47 54 48 25 29 0d ec c2 |,VERT%,L|GTH%)...|
|000006e0| 15 20 20 e7 20 46 4c 41 | 47 28 32 29 20 3d 20 31 |.  . FLA|G(2) = 1|
|000006f0| 20 8c 0d ec cc 25 20 20 | 20 20 42 41 43 4b 24 20 | ....%  |  BACK$ |
|00000700| 2b 3d 20 c4 4c 47 54 48 | 25 2d a9 28 42 41 43 4b |+= .LGTH|%-.(BACK|
|00000710| 24 29 2c 22 20 22 29 0d | ec d6 07 20 20 cc 0d ec |$)," ").|...  ...|
|00000720| e0 1b 20 20 20 20 42 41 | 43 4b 24 20 3d 20 c4 4c |..    BA|CK$ = .L|
|00000730| 47 54 48 25 2c 22 20 22 | 29 0d ec ea 07 20 20 cd |GTH%," "|)....  .|
|00000740| 0d ec f4 25 20 20 f1 20 | 8a 48 4f 52 49 5a 25 2c |...%  . |.HORIZ%,|
|00000750| 56 45 52 54 25 29 3b 22 | 3e 22 3b 42 41 43 4b 24 |VERT%);"|>";BACK$|
|00000760| 3b 22 3c 22 3b 0d ec fe | 19 20 20 ef 20 33 31 2c |;"<";...|.  . 31,|
|00000770| 48 4f 52 49 5a 25 2b 31 | 2c 56 45 52 54 25 0d ed |HORIZ%+1|,VERT%..|
|00000780| 08 05 e1 0d ed 12 05 20 | 0d ed 1c 0f dd f2 44 45 |....... |......DE|
|00000790| 4c 5f 43 48 45 43 4b 0d | ed 26 22 20 20 e7 20 28 |L_CHECK.|.&"  . (|
|000007a0| 43 48 41 52 20 3d 20 26 | 37 46 20 80 20 53 49 5a |CHAR = &|7F . SIZ|
|000007b0| 45 25 20 3d 20 30 29 20 | 8c 0d ed 30 0b 20 20 20 |E% = 0) |...0.   |
|000007c0| 20 ef 20 37 0d ed 3a 07 | 20 20 cd 0d ed 44 22 20 | . 7..:.|  ...D" |
|000007d0| 20 e7 20 28 43 48 41 52 | 20 3d 20 26 37 46 20 80 | . (CHAR| = &7F .|
|000007e0| 20 53 49 5a 45 25 20 3e | 20 30 29 20 8c 0d ed 4e | SIZE% >| 0) ...N|
|000007f0| 0d 20 20 20 20 ef 20 31 | 32 37 0d ed 58 12 20 20 |.    . 1|27..X.  |
|00000800| 20 20 53 49 5a 45 25 20 | 2d 3d 20 31 0d ed 62 19 |  SIZE% |-= 1..b.|
|00000810| 20 20 20 20 41 4e 24 20 | 3d 20 c0 41 4e 24 2c 53 |    AN$ |= .AN$,S|
|00000820| 49 5a 45 25 29 0d ed 6c | 07 20 20 cd 0d ed 76 05 |IZE%)..l|.  ...v.|
|00000830| e1 0d ed 80 05 20 0d ed | e4 10 dd f2 53 49 5a 45 |..... ..|....SIZE|
|00000840| 5f 43 48 45 43 4b 0d ed | ee 17 20 20 e7 20 53 49 |_CHECK..|..  . SI|
|00000850| 5a 45 25 20 3d 20 4c 47 | 54 48 25 20 8c 0d ed f8 |ZE% = LG|TH% ....|
|00000860| 0b 20 20 20 20 ef 20 37 | 0d ee 02 10 20 20 20 20 |.    . 7|....    |
|00000870| 43 48 41 52 20 3d 20 30 | 0d ee 0c 07 20 20 cd 0d |CHAR = 0|....  ..|
|00000880| ee 16 05 e1 0d ee 20 05 | 20 0d ee 48 16 dd a4 56 |...... .| ..H...V|
|00000890| 41 4c 49 44 5f 43 48 41 | 52 28 43 48 41 52 29 0d |ALID_CHA|R(CHAR).|
|000008a0| ee 52 40 e7 20 28 28 43 | 48 41 52 20 3e 20 4c 49 |.R@. ((C|HAR > LI|
|000008b0| 4d 49 54 25 28 54 59 50 | 45 25 2c 31 29 29 20 80 |MIT%(TYP|E%,1)) .|
|000008c0| 20 28 43 48 41 52 20 3c | 20 4c 49 4d 49 54 25 28 | (CHAR <| LIMIT%(|
|000008d0| 54 59 50 45 25 2c 32 29 | 29 29 20 8c 20 3d b9 0d |TYPE%,2)|)) . =..|
|000008e0| ee 5c 40 e7 20 28 28 43 | 48 41 52 20 3e 20 4c 49 |.\@. ((C|HAR > LI|
|000008f0| 4d 49 54 25 28 54 59 50 | 45 25 2c 33 29 29 20 80 |MIT%(TYP|E%,3)) .|
|00000900| 20 28 43 48 41 52 20 3c | 20 4c 49 4d 49 54 25 28 | (CHAR <| LIMIT%(|
|00000910| 54 59 50 45 25 2c 34 29 | 29 29 20 8c 20 3d b9 0d |TYPE%,4)|)) . =..|
|00000920| ee 66 40 e7 20 28 28 43 | 48 41 52 20 3e 20 4c 49 |.f@. ((C|HAR > LI|
|00000930| 4d 49 54 25 28 54 59 50 | 45 25 2c 35 29 29 20 80 |MIT%(TYP|E%,5)) .|
|00000940| 20 28 43 48 41 52 20 3c | 20 4c 49 4d 49 54 25 28 | (CHAR <| LIMIT%(|
|00000950| 54 59 50 45 25 2c 36 29 | 29 29 20 8c 20 3d b9 0d |TYPE%,6)|)) . =..|
|00000960| ee 70 13 e7 20 43 48 41 | 52 3d 26 30 44 20 8c 20 |.p.. CHA|R=&0D . |
|00000970| 3d b9 0d ee 7a 06 3d a3 | 0d ee 84 05 20 0d ee ac |=...z.=.|.... ...|
|00000980| 0f dd f2 53 48 4f 57 5f | 43 48 41 52 0d ee b6 15 |...SHOW_|CHAR....|
|00000990| 20 20 e7 20 46 4c 41 47 | 28 35 29 20 3d 20 31 20 |  . FLAG|(5) = 1 |
|000009a0| 8c 0d ee c0 0e 20 20 20 | 20 f1 20 22 23 22 3b 0d |.....   | . "#";.|
|000009b0| ee ca 07 20 20 cc 0d ee | d4 12 20 20 20 20 f1 20 |...  ...|..    . |
|000009c0| bd 28 43 48 41 52 29 3b | 0d ee de 07 20 20 cd 0d |.(CHAR);|....  ..|
|000009d0| ee e8 05 e1 0d ee f2 05 | 20 0d ef 10 25 dd f2 42 |........| ...%..B|
|000009e0| 4c 41 4e 4b 5f 49 4e 50 | 55 54 28 48 4f 52 49 5a |LANK_INP|UT(HORIZ|
|000009f0| 25 2c 56 45 52 54 25 2c | 4c 47 54 48 25 29 0d ef |%,VERT%,|LGTH%)..|
|00000a00| 1a 24 20 20 f1 20 8a 48 | 4f 52 49 5a 25 2d 31 2c |.$  . .H|ORIZ%-1,|
|00000a10| 56 45 52 54 25 29 3b 89 | 28 4c 47 54 48 25 2b 33 |VERT%);.|(LGTH%+3|
|00000a20| 29 3b 0d ef 24 05 e1 0d | ef 2e 05 20 0d ef 74 11 |);..$...|... ..t.|
|00000a30| dd f2 42 4c 41 4e 4b 5f | 43 48 45 43 4b 0d ef 7e |..BLANK_|CHECK..~|
|00000a40| 15 20 20 e7 20 46 4c 41 | 47 28 31 29 20 3d 20 31 |.  . FLA|G(1) = 1|
|00000a50| 20 8c 0d ef 88 13 20 20 | 20 20 46 4c 41 47 28 31 | .....  |  FLAG(1|
|00000a60| 29 20 3d 20 30 0d ef 92 | 07 20 20 cc 0d ef 9c 11 |) = 0...|.  .....|
|00000a70| 20 20 20 20 f2 45 52 52 | 4f 52 28 32 29 0d ef a6 |    .ERR|OR(2)...|
|00000a80| 13 20 20 20 20 46 4c 41 | 47 28 31 29 20 3d 20 32 |.    FLA|G(1) = 2|
|00000a90| 0d ef b0 07 20 20 cd 0d | ef ba 05 e1 0d ef c4 05 |....  ..|........|
|00000aa0| 20 0d ef d8 15 dd f2 44 | 45 43 49 4d 41 4c 28 45 | ......D|ECIMAL(E|
|00000ab0| 4e 54 52 59 24 29 0d ef | e2 17 20 20 ea 20 4d 4e |NTRY$)..|..  . MN|
|00000ac0| 53 25 2c 50 4e 54 25 2c | 4c 4f 4f 50 25 0d ef ec |S%,PNT%,|LOOP%...|
|00000ad0| 17 20 20 4d 4e 53 25 20 | 3d 20 30 3a 50 4e 54 25 |.  MNS% |= 0:PNT%|
|00000ae0| 20 3d 20 30 0d ef f6 1d | 20 20 e3 20 4c 4f 4f 50 | = 0....|  . LOOP|
|00000af0| 25 20 3d 20 31 20 b8 20 | a9 28 45 4e 54 52 59 24 |% = 1 . |.(ENTRY$|
|00000b00| 29 0d f0 00 28 20 20 20 | 20 e7 20 c1 45 4e 54 52 |)...(   | . .ENTR|
|00000b10| 59 24 2c 4c 4f 4f 50 25 | 2c 31 29 20 3d 20 22 2e |Y$,LOOP%|,1) = ".|
|00000b20| 22 20 50 4e 54 25 2b 3d | 31 0d f0 0a 28 20 20 20 |" PNT%+=|1...(   |
|00000b30| 20 e7 20 c1 45 4e 54 52 | 59 24 2c 4c 4f 4f 50 25 | . .ENTR|Y$,LOOP%|
|00000b40| 2c 31 29 20 3d 20 22 2d | 22 20 4d 4e 53 25 2b 3d |,1) = "-|" MNS%+=|
|00000b50| 31 0d f0 14 0d 20 20 ed | 20 4c 4f 4f 50 25 0d f0 |1....  .| LOOP%..|
|00000b60| 1e 32 20 20 20 e7 20 50 | 4e 54 25 20 3e 20 31 20 |.2   . P|NT% > 1 |
|00000b70| 84 20 4d 4e 53 25 20 3e | 20 31 20 84 20 a7 45 4e |. MNS% >| 1 . .EN|
|00000b80| 54 52 59 24 2c 22 2f 22 | 29 20 3c 3e 20 30 20 8c |TRY$,"/"|) <> 0 .|
|00000b90| 0d f0 28 13 20 20 20 20 | 46 4c 41 47 28 33 29 20 |..(.    |FLAG(3) |
|00000ba0| 3d 20 31 0d f0 32 11 20 | 20 20 20 f2 45 52 52 4f |= 1..2. |   .ERRO|
|00000bb0| 52 28 34 29 0d f0 3c 07 | 20 20 cc 0d f0 46 13 20 |R(4)..<.|  ...F. |
|00000bc0| 20 20 20 46 4c 41 47 28 | 33 29 20 3d 20 30 0d f0 |   FLAG(|3) = 0..|
|00000bd0| 50 07 20 20 cd 0d f0 5a | 05 e1 0d f0 64 05 20 0d |P.  ...Z|....d. .|
|00000be0| f0 a0 1b dd f2 4e 55 4d | 45 52 49 43 5f 43 48 45 |.....NUM|ERIC_CHE|
|00000bf0| 43 4b 28 45 4e 54 52 59 | 24 29 0d f0 aa 0d 20 20 |CK(ENTRY|$)....  |
|00000c00| ea 20 4c 4f 4f 50 25 0d | f0 b4 11 20 20 46 4c 41 |. LOOP%.|...  FLA|
|00000c10| 47 28 34 29 20 3d 20 30 | 0d f0 be 1d 20 20 e3 20 |G(4) = 0|....  . |
|00000c20| 4c 4f 4f 50 25 20 3d 20 | 31 20 b8 20 a9 28 45 4e |LOOP% = |1 . .(EN|
|00000c30| 54 52 59 24 29 0d f0 c8 | 3b 20 20 20 20 e7 20 c1 |TRY$)...|;    . .|
|00000c40| 45 4e 54 52 59 24 2c 4c | 4f 4f 50 25 2c 31 29 20 |ENTRY$,L|OOP%,1) |
|00000c50| 3c 20 22 2d 22 20 84 20 | c1 45 4e 54 52 59 24 2c |< "-" . |.ENTRY$,|
|00000c60| 4c 4f 4f 50 25 2c 31 29 | 20 3e 20 22 39 22 20 8c |LOOP%,1)| > "9" .|
|00000c70| 0d f0 d2 15 20 20 20 20 | 20 20 46 4c 41 47 28 34 |....    |  FLAG(4|
|00000c80| 29 20 3d 20 31 0d f0 dc | 13 20 20 20 20 20 20 f2 |) = 1...|.      .|
|00000c90| 45 52 52 4f 52 28 34 29 | 0d f0 e6 09 20 20 20 20 |ERROR(4)|....    |
|00000ca0| cd 0d f0 f0 0d 20 20 ed | 20 4c 4f 4f 50 25 0d f0 |.....  .| LOOP%..|
|00000cb0| fa 05 e1 0d f1 04 05 20 | 0d f1 68 1c dd f2 49 4e |....... |..h...IN|
|00000cc0| 32 28 48 4f 52 49 5a 25 | 2c 56 45 52 54 25 2c bb |2(HORIZ%|,VERT%,.|
|00000cd0| 49 44 24 29 0d f1 72 11 | 20 20 46 4c 41 47 28 30 |ID$)..r.|  FLAG(0|
|00000ce0| 29 20 3d 20 30 0d f1 7c | 1e 20 20 e7 20 46 4c 41 |) = 0..||.  . FLA|
|00000cf0| 47 28 32 29 20 3c 3e 20 | 31 20 42 41 43 4b 24 3d |G(2) <> |1 BACK$=|
|00000d00| 22 20 22 0d f1 86 24 20 | 20 f1 8a 48 4f 52 49 5a |" "...$ | ..HORIZ|
|00000d10| 25 2c 56 45 52 54 25 29 | 3b 22 28 22 3b 42 41 43 |%,VERT%)|;"(";BAC|
|00000d20| 4b 24 3a 22 29 22 3a 0d | f1 90 1a 20 20 ef 20 33 |K$:")":.|...  . 3|
|00000d30| 31 2c 48 4f 52 49 5a 25 | 2b 31 2c 56 45 52 54 25 |1,HORIZ%|+1,VERT%|
|00000d40| 3b 0d f1 9a 07 20 20 f5 | 0d f1 a4 0f 20 20 20 20 |;....  .|....    |
|00000d50| 2a 46 58 32 31 2c 30 0d | f1 ae 0f 20 20 20 20 41 |*FX21,0.|...    A|
|00000d60| 4e 24 20 3d 20 be 0d f1 | b8 2f 20 20 fd 20 a7 bb |N$ = ...|./  . ..|
|00000d70| 49 44 24 2c 41 4e 24 29 | 20 3c 3e 20 30 20 84 20 |ID$,AN$)| <> 0 . |
|00000d80| 41 4e 24 20 3d 20 22 5a | 22 20 84 20 41 4e 24 20 |AN$ = "Z|" . AN$ |
|00000d90| 3d 20 22 7a 22 0d f1 c2 | 0c 20 20 f1 20 41 4e 24 |= "z"...|.  . AN$|
|00000da0| 3b 0d f1 cc 1f 20 20 e7 | 20 41 4e 24 20 3d 20 22 |;....  .| AN$ = "|
|00000db0| 5a 22 20 84 20 41 4e 24 | 20 3d 20 22 7a 22 20 8c |Z" . AN$| = "z" .|
|00000dc0| 0d f1 d6 13 20 20 20 20 | 46 4c 41 47 28 30 29 20 |....    |FLAG(0) |
|00000dd0| 3d 20 31 0d f1 e0 1d 20 | 20 20 20 f1 8a 48 4f 52 |= 1.... |   ..HOR|
|00000de0| 49 5a 25 2c 56 45 52 54 | 25 29 3b 89 28 33 29 3b |IZ%,VERT|%);.(3);|
|00000df0| 0d f1 ea 07 20 20 cd 0d | f1 f4 15 20 20 41 4e 20 |....  ..|...  AN |
|00000e00| 3d 20 a7 bb 49 44 24 2c | 41 4e 24 29 0d f1 fe 05 |= ..ID$,|AN$)....|
|00000e10| e1 0d f2 08 05 20 0d f2 | 30 19 dd f2 43 4f 4d 50 |..... ..|0...COMP|
|00000e20| 41 43 54 28 4e 55 4d 25 | 2c 53 49 5a 45 25 29 0d |ACT(NUM%|,SIZE%).|
|00000e30| f2 3a 13 20 20 ea 20 4c | 4f 4f 50 25 2c 53 49 47 |.:.  . L|OOP%,SIG|
|00000e40| 4e 25 0d f2 44 0f 20 20 | 42 49 4e 24 20 3d 20 22 |N%..D.  |BIN$ = "|
|00000e50| 22 0d f2 4e 15 20 20 53 | 49 47 4e 25 20 3d 20 b4 |"..N.  S|IGN% = .|
|00000e60| 28 4e 55 4d 25 29 0d f2 | 58 14 20 20 4e 55 4d 25 |(NUM%)..|X.  NUM%|
|00000e70| 20 3d 20 94 28 4e 55 4d | 25 29 0d f2 62 14 20 20 | = .(NUM|%)..b.  |
|00000e80| e7 20 53 49 5a 45 25 20 | 3c 3e 20 31 20 8c 0d f2 |. SIZE% |<> 1 ...|
|00000e90| 6c 1d 20 20 20 20 e3 20 | 4c 4f 4f 50 25 20 3d 20 |l.    . |LOOP% = |
|00000ea0| 31 20 b8 20 53 49 5a 45 | 25 2d 31 0d f2 76 1f 20 |1 . SIZE|%-1..v. |
|00000eb0| 20 20 20 20 20 42 49 4e | 24 20 2b 3d 20 bd 28 4e |     BIN|$ += .(N|
|00000ec0| 55 4d 25 20 83 20 32 35 | 36 29 0d f2 80 1b 20 20 |UM% . 25|6)....  |
|00000ed0| 20 20 20 20 4e 55 4d 25 | 20 3d 20 4e 55 4d 25 20 |    NUM%| = NUM% |
|00000ee0| 81 20 32 35 36 0d f2 8a | 0f 20 20 20 20 ed 20 4c |. 256...|.    . L|
|00000ef0| 4f 4f 50 25 0d f2 94 07 | 20 20 cd 0d f2 9e 20 20 |OOP%....|  ....  |
|00000f00| 20 e7 20 53 49 47 4e 25 | 20 3d 20 2d 31 20 4e 55 | . SIGN%| = -1 NU|
|00000f10| 4d 25 3d 4e 55 4d 25 2b | 31 32 38 0d f2 a8 16 20 |M%=NUM%+|128.... |
|00000f20| 20 42 49 4e 24 20 2b 3d | 20 bd 28 4e 55 4d 24 25 | BIN$ +=| .(NUM$%|
|00000f30| 29 0d f2 b2 05 e1 0d f2 | bc 05 20 0d f2 f8 18 dd |).......|.. .....|
|00000f40| f2 45 58 50 41 4e 44 28 | 42 49 4e 24 2c 53 49 5a |.EXPAND(|BIN$,SIZ|
|00000f50| 45 25 29 0d f3 02 13 20 | 20 ea 20 4c 4f 4f 50 25 |E%).... | . LOOP%|
|00000f60| 2c 53 49 47 4e 25 0d f3 | 0c 18 20 20 4e 55 4d 25 |,SIGN%..|..  NUM%|
|00000f70| 20 3d 20 97 28 c2 42 49 | 4e 24 2c 31 29 29 0d f3 | = .(.BI|N$,1))..|
|00000f80| 16 14 20 20 e7 20 4e 55 | 4d 25 20 3e 20 31 32 37 |..  . NU|M% > 127|
|00000f90| 20 8c 0d f3 20 15 20 20 | 20 20 4e 55 4d 25 3d 4e | ... .  |  NUM%=N|
|00000fa0| 55 4d 25 2d 31 32 38 0d | f3 2a 12 20 20 20 20 53 |UM%-128.|.*.    S|
|00000fb0| 49 47 4e 25 20 3d 20 2d | 31 0d f3 34 07 20 20 cc |IGN% = -|1..4.  .|
|00000fc0| 0d f3 3e 11 20 20 20 20 | 53 49 47 4e 25 20 3d 20 |..>.    |SIGN% = |
|00000fd0| 31 0d f3 48 07 20 20 cd | 0d f3 52 13 20 20 e7 20 |1..H.  .|..R.  . |
|00000fe0| 53 49 5a 45 25 20 3c 3e | 31 20 8c 0d f3 5c 1d 20 |SIZE% <>|1 ...\. |
|00000ff0| 20 20 20 e3 20 4c 4f 4f | 50 25 20 3d 20 31 20 b8 |   . LOO|P% = 1 .|
|00001000| 20 53 49 5a 45 25 2d 31 | 0d f3 66 19 20 20 20 20 | SIZE%-1|..f.    |
|00001010| 20 20 4e 55 4d 25 20 3d | 20 4e 55 4d 25 2a 32 35 |  NUM% =| NUM%*25|
|00001020| 36 0d f3 70 2d 20 20 20 | 20 20 20 4e 55 4d 25 20 |6..p-   |   NUM% |
|00001030| 3d 20 4e 55 4d 25 2b 97 | 28 c1 42 49 4e 24 2c 53 |= NUM%+.|(.BIN$,S|
|00001040| 49 5a 45 25 2d 4c 4f 4f | 50 25 2c 31 29 29 0d f3 |IZE%-LOO|P%,1))..|
|00001050| 7a 0f 20 20 20 20 ed 20 | 4c 4f 4f 50 25 0d f3 84 |z.    . |LOOP%...|
|00001060| 07 20 20 cd 0d f3 8e 17 | 20 20 4e 55 4d 25 20 3d |.  .....|  NUM% =|
|00001070| 20 4e 55 4d 25 2a 53 49 | 47 4e 25 0d f3 98 05 e1 | NUM%*SI|GN%.....|
|00001080| 0d f3 a2 05 20 0d f3 c0 | 13 dd f2 45 52 52 4f 52 |.... ...|...ERROR|
|00001090| 28 45 72 72 6f 72 25 29 | 0d f3 ca 19 20 20 ea 20 |(Error%)|....  . |
|000010a0| 48 4c 4f 43 25 2c 56 4c | 4f 43 25 2c 4c 47 54 48 |HLOC%,VL|OC%,LGTH|
|000010b0| 25 0d f3 d4 0c 20 20 c8 | 8e 20 eb 20 ca 0d f3 de |%....  .|. . ....|
|000010c0| 2a 20 20 20 20 c9 20 30 | 2c 38 2c 31 32 2c 31 35 |*    . 0|,8,12,15|
|000010d0| 20 20 20 3a 20 48 4c 4f | 43 25 3d 32 30 3a 20 56 |   : HLO|C%=20: V|
|000010e0| 4c 4f 43 25 3d 33 30 0d | f3 e8 2a 20 20 20 20 c9 |LOC%=30.|..*    .|
|000010f0| 20 31 2c 34 2c 39 2c 31 | 33 20 20 20 20 3a 20 48 | 1,4,9,1|3    : H|
|00001100| 4c 4f 43 25 3d 31 30 3a | 20 56 4c 4f 43 25 3d 33 |LOC%=10:| VLOC%=3|
|00001110| 30 0d f3 f2 2a 20 20 20 | 20 c9 20 32 2c 35 2c 31 |0...*   | . 2,5,1|
|00001120| 30 20 20 20 20 20 20 3a | 20 48 4c 4f 43 25 3d 35 |0      :| HLOC%=5|
|00001130| 20 3a 20 56 4c 4f 43 25 | 3d 33 30 0d f3 fc 2a 20 | : VLOC%|=30...* |
|00001140| 20 20 20 c9 20 33 2c 31 | 31 2c 31 34 20 20 20 20 |   . 3,1|1,14    |
|00001150| 20 3a 20 48 4c 4f 43 25 | 3d 32 30 3a 20 56 4c 4f | : HLOC%|=20: VLO|
|00001160| 43 25 3d 32 33 0d f4 06 | 2a 20 20 20 20 c9 20 36 |C%=23...|*    . 6|
|00001170| 2c 37 20 20 20 20 20 20 | 20 20 20 3a 20 48 4c 4f |,7      |   : HLO|
|00001180| 43 25 3d 31 30 3a 20 56 | 4c 4f 43 25 3d 32 33 0d |C%=10: V|LOC%=23.|
|00001190| f4 10 2a 20 20 20 20 c9 | 20 31 36 20 20 20 20 20 |..*    .| 16     |
|000011a0| 20 20 20 20 20 3a 20 48 | 4c 4f 43 25 3d 34 30 3a |     : H|LOC%=40:|
|000011b0| 20 56 4c 4f 43 25 3d 33 | 30 0d f4 1a 2a 20 20 20 | VLOC%=3|0...*   |
|000011c0| 20 c9 20 31 37 20 20 20 | 20 20 20 20 20 20 20 3a | . 17   |       :|
|000011d0| 20 48 4c 4f 43 25 3d 34 | 30 3a 20 56 4c 4f 43 25 | HLOC%=4|0: VLOC%|
|000011e0| 3d 32 33 0d f4 24 2a 20 | 20 20 20 c9 20 31 38 2c |=23..$* |   . 18,|
|000011f0| 31 39 2c 32 30 2c 32 31 | 20 3a 20 48 4c 4f 43 25 |19,20,21| : HLOC%|
|00001200| 3d 32 30 3a 20 56 4c 4f | 43 25 3d 36 32 0d f4 2e |=20: VLO|C%=62...|
|00001210| 24 20 20 20 20 7f 20 20 | 20 20 20 20 20 20 3a 20 |$    .  |      : |
|00001220| 48 4c 4f 43 25 3d 30 20 | 3a 20 56 4c 4f 43 25 3d |HLOC%=0 |: VLOC%=|
|00001230| 30 0d f4 38 07 20 20 cb | 0d f4 42 1f 20 20 4c 47 |0..8.  .|..B.  LG|
|00001240| 54 48 25 20 3d 20 a9 28 | 45 72 72 6f 72 24 28 45 |TH% = .(|Error$(E|
|00001250| 72 72 6f 72 25 29 29 0d | f4 4c 24 20 20 f1 8a 48 |rror%)).|.L$  ..H|
|00001260| 4c 4f 43 25 2c 56 4c 4f | 43 25 29 3b 45 72 72 6f |LOC%,VLO|C%);Erro|
|00001270| 72 24 28 45 72 72 6f 72 | 25 29 3b 0d f4 56 09 20 |r$(Error|%);..V. |
|00001280| 20 ef 20 37 0d f4 60 10 | 20 20 f2 44 45 4c 41 59 | . 7..`.|  .DELAY|
|00001290| 28 37 35 29 0d f4 6a 1e | 20 20 f1 8a 48 4c 4f 43 |(75)..j.|  ..HLOC|
|000012a0| 25 2c 56 4c 4f 43 25 29 | 3b 89 28 4c 47 54 48 25 |%,VLOC%)|;.(LGTH%|
|000012b0| 29 3b 0d f4 74 05 e1 0d | f4 7e 05 20 0d f4 88 13 |);..t...|.~. ....|
|000012c0| dd f2 44 45 4c 41 59 28 | 44 45 4c 41 59 25 29 0d |..DELAY(|DELAY%).|
|000012d0| f4 92 0c 20 20 ea 20 4e | 4f 57 25 0d f4 9c 0e 20 |...  . N|OW%.... |
|000012e0| 20 4e 4f 57 25 20 3d 20 | 91 0d f4 a6 07 20 20 f5 | NOW% = |.....  .|
|000012f0| 0d f4 b0 17 20 20 fd 20 | 91 2d 4e 4f 57 25 20 3e |....  . |.-NOW% >|
|00001300| 20 44 45 4c 41 59 25 0d | f4 ba 05 e1 0d f4 c4 05 | DELAY%.|........|
|00001310| 20 0d f4 ec 1b dd f2 46 | 4f 52 4d 41 54 28 41 4d | ......F|ORMAT(AM|
|00001320| 4f 55 4e 54 24 2c 4c 47 | 54 48 25 29 0d f4 f6 21 |OUNT$,LG|TH%)...!|
|00001330| 20 20 ea 20 41 4d 54 25 | 2c 41 4d 54 2c 44 45 43 |  . AMT%|,AMT,DEC|
|00001340| 24 2c 57 48 4c 45 24 2c | 53 49 47 4e 24 0d f5 00 |$,WHLE$,|SIGN$...|
|00001350| 17 20 20 41 4d 54 20 3d | 20 bb 20 28 41 4d 4f 55 |.  AMT =| . (AMOU|
|00001360| 4e 54 24 29 0d f5 0a 11 | 20 20 e7 20 41 4d 54 20 |NT$)....|  . AMT |
|00001370| 3c 20 30 20 8c 0d f5 14 | 13 20 20 20 20 53 49 47 |< 0 ....|.    SIG|
|00001380| 4e 24 20 3d 20 22 2d 22 | 0d f5 1e 07 20 20 cc 0d |N$ = "-"|....  ..|
|00001390| f5 28 13 20 20 20 20 53 | 49 47 4e 24 20 3d 20 22 |.(.    S|IGN$ = "|
|000013a0| 20 22 0d f5 32 07 20 20 | cd 0d f5 3c 1c 20 20 41 | "..2.  |...<.  A|
|000013b0| 4d 54 25 20 20 3d 20 94 | 28 41 4d 54 29 2a 31 30 |MT%  = .|(AMT)*10|
|000013c0| 30 2b 30 2e 31 0d f5 46 | 1c 20 20 57 48 4c 45 24 |0+0.1..F|.  WHLE$|
|000013d0| 20 3d 20 c3 28 41 4d 54 | 25 29 20 81 20 31 30 30 | = .(AMT|%) . 100|
|000013e0| 29 0d f5 50 1b 20 20 44 | 45 43 24 20 20 3d 20 c3 |)..P.  D|EC$  = .|
|000013f0| 28 41 4d 54 25 20 83 20 | 31 30 30 29 0d f5 5a 22 |(AMT% . |100)..Z"|
|00001400| 20 20 44 45 43 24 20 20 | 3d 20 c4 32 2d a9 28 44 |  DEC$  |= .2-.(D|
|00001410| 45 43 24 29 2c 22 30 22 | 29 2b 44 45 43 24 0d f5 |EC$),"0"|)+DEC$..|
|00001420| 64 22 20 20 4e 55 4d 24 | 20 20 3d 20 53 49 47 4e |d"  NUM$|  = SIGN|
|00001430| 24 2b 57 48 4c 45 24 2b | 22 2e 22 2b 44 45 43 24 |$+WHLE$+|"."+DEC$|
|00001440| 0d f5 6e 26 20 20 4e 55 | 4d 24 20 20 3d 20 c4 4c |..n&  NU|M$  = .L|
|00001450| 47 54 48 25 2d a9 28 4e | 55 4d 24 29 2c 22 20 22 |GTH%-.(N|UM$)," "|
|00001460| 29 2b 4e 55 4d 24 0d f5 | 78 05 e1 0d f5 82 05 20 |)+NUM$..|x...... |
|00001470| 0d f5 b4 15 dd f2 52 45 | 53 54 4f 52 45 28 4c 41 |......RE|STORE(LA|
|00001480| 42 45 4c 24 29 0d f5 be | 0e 20 20 ea 20 54 49 54 |BEL$)...|.  . TIT|
|00001490| 4c 45 24 0d f5 c8 07 20 | 20 f7 0d f5 d2 07 20 20 |LE$.... | .....  |
|000014a0| f5 0d f5 dc 10 20 20 20 | 20 f3 20 54 49 54 4c 45 |.....   | . TITLE|
|000014b0| 24 0d f5 e6 17 20 20 fd | 20 4c 41 42 45 4c 24 20 |$....  .| LABEL$ |
|000014c0| 3d 20 54 49 54 4c 45 24 | 0d f5 f0 05 e1 0d f5 fa |= TITLE$|........|
|000014d0| 05 20 0d f6 18 0e dd f2 | 49 4e 49 54 5f 53 59 53 |. ......|INIT_SYS|
|000014e0| 0d f6 22 1a 20 20 ea 20 | 4c 4f 4f 50 31 25 2c 4c |..".  . |LOOP1%,L|
|000014f0| 4f 4f 50 32 25 2c 4e 55 | 4d 25 0d f6 2c 18 20 20 |OOP2%,NU|M%..,.  |
|00001500| f2 52 45 53 54 4f 52 45 | 28 22 53 59 53 54 45 4d |.RESTORE|("SYSTEM|
|00001510| 22 29 0d f6 36 0e 20 20 | dc 20 53 59 53 54 45 4d |")..6.  |. SYSTEM|
|00001520| 0d f6 40 1c 20 20 dc 20 | 33 31 2c 31 32 37 2c 33 |..@.  . |31,127,3|
|00001530| 31 2c 31 32 37 2c 33 31 | 2c 31 32 37 0d f6 4a 1a |1,127,31|,127..J.|
|00001540| 20 20 dc 20 33 31 2c 33 | 33 2c 36 34 2c 39 31 2c |  . 31,3|3,64,91,|
|00001550| 39 36 2c 31 32 33 0d f6 | 54 19 20 20 dc 20 34 34 |96,123..|T.  . 44|
|00001560| 2c 34 37 2c 34 37 2c 35 | 38 2c 38 39 2c 39 31 0d |,47,47,5|8,89,91.|
|00001570| f6 5e 19 20 20 dc 20 31 | 32 2c 31 34 2c 31 32 2c |.^.  . 1|2,14,12,|
|00001580| 31 34 2c 38 39 2c 39 31 | 0d f6 68 2e 20 20 dc 20 |14,89,91|..h.  . |
|00001590| 22 45 6e 74 72 79 20 49 | 6e 76 61 6c 69 64 22 2c |"Entry I|nvalid",|
|000015a0| 20 22 45 6e 74 72 79 20 | 6d 75 73 74 20 62 65 20 | "Entry |must be |
|000015b0| 6b 65 79 65 64 22 0d f6 | 72 31 20 20 dc 20 22 45 |keyed"..|r1  . "E|
|000015c0| 6e 74 72 79 20 6e 6f 74 | 20 69 6e 20 72 61 6e 67 |ntry not| in rang|
|000015d0| 65 22 2c 20 22 45 6e 74 | 72 79 20 6e 6f 74 20 6e |e", "Ent|ry not n|
|000015e0| 75 6d 65 72 69 63 22 0d | f6 7c 04 0d f6 86 04 0d |umeric".|.|......|
|000015f0| f6 90 04 0d f6 9a 04 0d | f6 a4 26 20 20 de 20 4c |........|..&  . L|
|00001600| 49 4d 49 54 25 28 33 2c | 36 29 2c 46 4c 41 47 28 |IMIT%(3,|6),FLAG(|
|00001610| 31 30 29 2c 45 72 72 6f | 72 24 28 34 29 0d f6 ae |10),Erro|r$(4)...|
|00001620| 04 0d f6 b8 04 0d f6 c2 | 04 0d f6 cc 16 20 20 e3 |........|.....  .|
|00001630| 20 4c 4f 4f 50 31 25 20 | 3d 20 30 20 b8 20 33 0d | LOOP1% |= 0 . 3.|
|00001640| f6 d6 18 20 20 20 20 e3 | 20 4c 4f 4f 50 32 25 20 |...    .| LOOP2% |
|00001650| 3d 20 31 20 b8 20 36 0d | f6 e0 10 20 20 20 20 20 |= 1 . 6.|...     |
|00001660| 20 f3 20 4e 55 4d 25 0d | f6 ea 26 20 20 20 20 20 | . NUM%.|..&     |
|00001670| 20 4c 49 4d 49 54 25 28 | 4c 4f 4f 50 31 25 2c 4c | LIMIT%(|LOOP1%,L|
|00001680| 4f 4f 50 32 25 29 20 3d | 20 4e 55 4d 25 0d f6 f4 |OOP2%) =| NUM%...|
|00001690| 10 20 20 20 20 ed 20 4c | 4f 4f 50 32 25 0d f6 fe |.    . L|OOP2%...|
|000016a0| 0e 20 20 ed 20 4c 4f 4f | 50 31 25 0d f7 08 16 20 |.  . LOO|P1%.... |
|000016b0| 20 e3 20 4c 4f 4f 50 31 | 25 20 3d 20 31 20 b8 20 | . LOOP1|% = 1 . |
|000016c0| 34 0d f7 12 18 20 20 20 | 20 f3 20 45 72 72 6f 72 |4....   | . Error|
|000016d0| 24 28 4c 4f 4f 50 31 25 | 29 0d f7 1c 0e 20 20 ed |$(LOOP1%|)....  .|
|000016e0| 20 4c 4f 4f 50 31 25 0d | f7 26 05 e1 0d f7 30 05 | LOOP1%.|.&....0.|
|000016f0| 20 0d ff                |                         | ..     |        |
+--------+-------------------------+-------------------------+--------+--------+